(* -*- Mode:caml; -*-
   *===----------------------------------------------------------------------===
   * Version: $Id: test_wrapper.ml,v 0.0 2012/04/16 14:07:59 hongboz Exp $
   *===----------------------------------------------------------------------===*)
open Format

let fib = function
  | 0 | 1 -> 1
  | n -> fib (n-1) + fib (n-2)


















